'This here ist basically just for fun. The .NET app works perfectly fine.
Set objShell = WScript.CreateObject("WScript.Shell")
Set colUserEnvVars = objShell.Environment("User")
Set TypeLib = CreateObject("Scriptlet.TypeLib")
myGuid = TypeLib.Guid
myGuid = Left(myGuid, Len(myGuid)-2)
TempFile = colUserEnvVars("TMP")+"\"+myGuid+".xml"
objShell.Run "WinSAT formal -restart clean -xml " + TempFile,1,True
objShell.Run "iexplore " + TempFile,1,True